From 9df36e7e6dc13e9f89c42ba509f61127c9e139d3 Mon Sep 17 00:00:00 2001 From: Miles Bader Date: Tue, 14 Nov 2000 09:01:27 +0000 Subject: [PATCH] (header-line): Use `:box nil' for color/gs displays too. --- lisp/faces.el | 36 ++++++++++++++++++------------------ 1 file changed, 18 insertions(+), 18 deletions(-) diff --git a/lisp/faces.el b/lisp/faces.el index a8c9eee5517..ee65edd3f3b 100644 --- a/lisp/faces.el +++ b/lisp/faces.el @@ -1601,29 +1601,29 @@ created." ;; highlighting; this may be too confusing in general, although it ;; happens to look good with the only current use of header-lines, ;; the info browser. XXX - (:underline t)) + :underline t) (((class color grayscale) (background light)) - (:inherit mode-line - :background "grey90" :foreground "grey20" - :box (:line-width 1 :style released-button))) + :inherit mode-line + :background "grey90" :foreground "grey20" + :box nil) (((class color grayscale) (background dark)) - (:inherit mode-line - :background "grey20" :foreground "grey90" - :box (:line-width 1 :style released-button))) + :inherit mode-line + :background "grey20" :foreground "grey90" + :box nil) (((class mono) (background light)) - (:inherit mode-line - :background "white" :foreground "black" - :inverse-video nil - :box nil - :underline t)) + :inherit mode-line + :background "white" :foreground "black" + :inverse-video nil + :box nil + :underline t) (((class mono) (background dark)) - (:inherit mode-line - :background "black" :foreground "white" - :inverse-video nil - :box nil - :underline t)) + :inherit mode-line + :background "black" :foreground "white" + :inverse-video nil + :box nil + :underline t) (t - (:inverse-video t))) + :inverse-video t)) "Basic header-line face." :version "21.1" :group 'basic-faces) -- 2.30.2